C     BLK11
C
      BLOCK DATA
C
      IMPLICIT REAL*8(A-H,O-Z)
C
      COMMON/INOMOT/ NOINTG(21)
C
      COMMON/IRSTGM/ IGMRST,IARST(3),IRSCY(3)
C
      COMMON/ISAGRS/ ISARUM(7)
C
      COMMON/ISAGIM/ ISAGUM(3)
C
      COMMON/CRSTGM/ RSTDUM(36)
C
      COMMON/CSAGIM/ SAGDUM(43)
C
      COMMON/CSAGRS/ SARDUM(36)
C
      COMMON/SAGICS/ SAICDM(9)
C
      COMMON/SAINTF/ SAFDUM(4)
C
      COMMON/CSAPLC/ SAPPRM(100),ISAPLS(20)
C
      COMMON/RAVSCS/ VISCDM(32),VDMPUP(2),VDMPDN(2),NVDMPR
C
C
C
      DATA NOINTG/21*0/
C
      DATA IGMRST/0/,IARST/3*0/,IRSCY/3*0/
C
      DATA ISARUM/7*0/
C
      DATA ISAGUM/3*0/
C
      DATA RSTDUM/36*0.0D0/
C
      DATA SAFDUM/4*0.0D0/
C
      DATA SAICDM/5*0.0D0,2*1.0D-3,2*1.0D-5/
C
      DATA SAGDUM/43*0.0D0/
C
      DATA SARDUM/36*0.0D0/
C
      DATA SAPPRM/100*0.0D0/,ISAPLS/20*0/
C
      DATA VISCDM/32*0.0D0/,NVDMPR/0/
C
      DATA VDMPUP/1.0D-2,1.0D-3/,VDMPDN/1.0D-4,1.0D-5/
C
C
C
      END
